Author: Nicolas ERDRICH

Rotation

Zoom

Dépliement

Nicolas ERDRICH

Arêtes cachées

Dimensions

z = 6.283185307179586 (slider from 0 to 360*°, step 1*°)
R_z: {{cos(z), sin(z), 0}, {-sin(z), cos(z), 0}, {0, 0, 1}}
a = 17.7 (slider from 4 to 40, step 0.1)
echelle: {{a, 0, 0}, {0, a, 0}, {0, 0, a}}
P = (148.10996563573894, -18.06830450598999)
β: (x(P) - 0) * 5
sinβ: sin(β°)
cosβ: cos(β°)
R_y: {{cosβ, 0, -sinβ}, {0, 1, 0}, {sinβ, 0, cosβ}}
α: (y(P) - 0) * 5
sinα: sin(α°)
cosα: cos(α°)
R_x: {{1, 0, 0}, {0, cosα, sinα}, {0, -sinα, cosα}}
I = (41.58075601374575, -39.03008391083255)
u = 1.6 (slider from 1 to 5, step 0.1)
v = 1.1 (slider from 1 to 5, step 0.1)
w = 1.4 (slider from 1 to 5, step 0.1)
Mat: echelle * R_x * R_y * R_z
cube: {{{u}, {v}, {w}}, {{-u}, {v}, {w}}, {{-u}, {-v}, {w}}, {{u}, {-v}, {w}}, {{u}, {v}, {-w}}, {{-u}, {v}, {-w}}, {{-u}, {-v}, {-w}}, {{u}, {-v}, {-w}}}
cube' = Sequence(Mat * Element[cube, k], k, 1, 8)
alpha = 0 (slider from 0 to 90, step 0.1)
AE: Element[cube', 5] - Element[cube', 1]
droite = Element(Element[AE, 3], 1)
listepoints = Sequence(I + (Element[cube', k, 1, 1], Element[cube', k, 2, 1]), k, 1, 8)
A = Element(listepoints, 2)
E = Element(listepoints, 1)
C_1 = Element(listepoints, 4)
D = Element(listepoints, 3)
poly1, a_1, b, c_1, d = Polygon(A, E, C_1, D)
B = Element(listepoints, 6)
F = Element(listepoints, 7)
G = Element(listepoints, 8)
H = Element(listepoints, 5)
poly2, e, f, g, h = Polygon(B, F, G, H)
C = Element(listepoints, 3)
poly3, f_1, i, a_2, b_1 = Polygon(F, C, A, B)
AB: Element[cube', 2] - Element[cube', 1]
avant = Element(AB, 3, 1)
poly4, c_2, g_1, h_1, e_1 = Polygon(C_1, G, H, E)
AC: Element[cube', 4] - Element[cube', 1]
dessus = Element(AC, 3, 1)
poly5, f_2, c_3, c_4, g_2 = Polygon(F, C, C_1, G)
poly6, a_3, b_2, h_2, e_2 = Polygon(A, B, H, E)
c = Segment(E, A)
j = Segment(A, C)
k = Segment(A, B)
l = Segment(C, C_1)
n = 1
m = Segment(C_1, E)
p = Segment(A, B)
q = Segment(B, H)
r = Segment(H, E)
s = Segment(H, G)
t = Segment(B, F)
d_1 = Segment(G, C_1)
i_1 = Segment(F, G)
j_1 = Segment(F, C)
o = false
D': A + v * cos(alpha°) / u * (A - E) + sin(alpha°) * (D - A)
F': B + v * cos(alpha°) / u * (A - E) + sin(alpha°) * (D - A)
poly7, a_4, b_3, f', d' = Polygon(A, B, F', D')
C': E + v * cos(alpha°) / w * (E - H) + sin(alpha°) * (D - A)
D'': A + v / w * cos(alpha°) * (E - H) + sin(alpha°) * (D - A)
poly8, e_3, a_5, d'', c' = Polygon(E, A, D'', C')
F'': B + v * cos(alpha°) / w * (B - A) + sin(alpha°) * (D - A)
G': H + v * cos(alpha°) * (B - A) / w + sin(alpha°) * (D - A)
poly9, b_4, f'', g', h_3 = Polygon(B, F'', G', H)
G'': H + v * cos(alpha°) / u * (E - A) + sin(alpha°) * (D - A)
C''': E + v * cos(alpha°) / u * (E - A) + sin(alpha°) * (D - A)
poly10, h_4, g'', c''', e_4 = Polygon(H, G'', C''', E)
A_1: C_1 + cos(alpha°) * (C_1 - E) * u / v + sin(alpha°) * (D - C_1) + C''' - C_1
A_2: C''' + u / v * cos(alpha°) * (C''' - E) + sin(alpha°) * (A_1 - C''')
B_2: G'' + u / v * cos(alpha°) * (C''' - E) + sin(alpha°) * (A_1 - C''')
poly11, a_6, b_5, g''_1, c'''_1 = Polygon(A_2, B_2, G'', C''')
B_1: G + u * cos(alpha°) / (v * (C_1 - E)) + sin(alpha°) * (D - C_1) + C''' - C_1
image = 0